function test()
    a = [0 0 0 0 0 0 0;
        0 0 0 0 0 0 0;
        0 0 0 0 0 0 0;
        0 0 0 0 0 0 0;
        0 1 1 1 1 1 0;
        0 1 1 1 1 1 0;
        0 1 1 0 0 0 0;
        0 1 1 0 0 0 0;
        0 1 1 1 1 0 0;
        0 1 1 1 1 0 0;
        0 1 1 0 0 0 0;
        0 1 1 0 0 0 0;
        0 1 1 1 1 0 0;
        0 1 1 1 1 0 0;
        0 0 0 0 0 0 0;
        0 0 0 0 0 0 0;
        0 1 1 1 1 1 1;
        0 1 1 1 1 1 0;
        0 1 1 0 0 0 0;
        0 1 1 0 0 0 0;
        0 1 1 1 1 0 0;
        0 1 1 1 1 0 0;
        0 1 1 0 0 0 0;
        0 1 1 0 0 0 0;
        0 1 1 1 1 1 0;
        0 1 1 1 1 1 0;
        0 0 0 0 0 0 0];
    
    a = 1 - a;
    a (:, 8 : 14) = a 
    
    [ nlines topRow bottomRow leftColumn rightColumn ] = lineBoundaries(a)
    
    for i = 1 : nlines
        [ nletters topRowLetters bottomRowLetters leftColumnLetters rightColumnLetters ] ...
            = letterBoundariesInSingleLine( a(topRow(i) : bottomRow(i), leftColumn(i) : rightColumn(i) ))
        topRowLetters = topRowLetters + topRow(i);
        bottomRowLetters = bottomRowLetters + topRow(i);
        leftColumnLetters = leftColumnLetters + leftColumn(i);
        rightColumnLetters = rightColumnLetters + leftColumn(i);
    end
    

end

